home *** CD-ROM | disk | FTP | other *** search
/ El Mac 8 / El Mac 8.iso / Shareware / Demos / OpenStack™ (Demo US) / OpenStack™ Demo / Objects Library (Demo) / Sample script / Sngle⁄Double-Click (mouseUp) / Sngle_Double-Click (mouseUp).rsrc / HSCR_12800 < prev    next >
Encoding:
Text File  |  1995-10-23  |  192 b   |  10 lines
  1. on mouseUp
  2.   wait 10 ticks
  3.   if the mouse is down then
  4.     -- your script here
  5.      put "double-clic"
  6.   else
  7.     -- your script here for simple-clic
  8.     put "simple-clic"
  9.   end if
  10. end mouseUp